<?php

require('fpdf.php');

$V_NOMFILE = "archivos/tmp.txt";
$V_GESTOR  = FOPEN($V_NOMFILE,'r');
$V_LINEA   = FGETS($V_GESTOR,4096);
$A_DATOS   = EXPLODE('|',chop($V_LINEA));
$V_REPORTE = $A_DATOS[0];
$V_CAD     = "GERENCIA COMERCIAL\nDEPTO. FACTURACION Y COBRANZA\n$V_REPORTE";

$pdf=new FPDF();
$pdf->SetAutoPageBreak(1);
$pdf->AddPage();
$pdf->SetFont('Times','B',18);
$pdf->SetFillColor(51,51,51);
//$pdf->Cell(30,14.2,$V_REPORTE,0,0,L);
$pdf->SetFont('Arial','B',8);
$pdf->SetX(40);
$pdf->MultiCell(119.8,4.73,$V_CAD,0,C);
$pdf->Image('imagenes/logo-fyc.jpg',20,10,15.3,17.9,'JPG');
$pdf->Image('imagenes/logo_cfe.jpg',160,10,40,14.2,'JPG');

WHILE(!FEOF($V_GESTOR))
{
     $A_DATOS=ARRAY();
     $V_LINEA=FGETS($V_GESTOR);
     $A_DATOS=EXPLODE('|',chop($V_LINEA));
     $V_ALIGNCEL='C';
     $V_BAND=0;
     IF ($V_REPORTE=='INTERCAMBIO') $V_ANCHOCEL=30;
     IF ($B_ADDPAGE==1) $pdf->AddPage();
     IF (COUNT($A_DATOS)<=2)
     {
        $V_CONT=0;
        $V_ALIGNCEL='C';
        $pdf->SetFont('Times','B',8);
        IF ($A_DATOS[0]!='USU' AND $A_DATOS[0]!='VTA' AND $A_DATOS[0]!='PRO' AND $A_DATOS[0]!='COMPRA' AND $A_DATOS[0]!='VENTA' AND $A_DATOS[0]!='*')
           { $pdf->ln();$pdf->ln();$pdf->Cell(190,4.5,$A_DATOS[0],0,0,'L',0);$B_ADDPAGE=0; $B_PRO=0;}
        $pdf->SetTextColor(255,255,255);
        IF ($A_DATOS[0]=='USU')    { $A_DATOS[0]='USUARIOS';  $V_ANCHOCEL=14.62; $pdf->ln();$pdf->ln();$pdf->Cell(190,4.5,$A_DATOS[0],1,0,$V_ALIGNCEL,1);             $B_ADDPAGE=0;$B_PRO=0;}
        IF ($A_DATOS[0]=='VTA')    { $A_DATOS[0]='VENTAS';    $V_ANCHOCEL=13.57; $pdf->ln();$pdf->ln();$pdf->ln(); $pdf->Cell(190,4.5,$A_DATOS[0],1,0,$V_ALIGNCEL,1); $B_ADDPAGE=0;$B_PRO=0;}
        IF ($A_DATOS[0]=='PRO')    { $A_DATOS[0]='PRODUCTOS'; $V_ANCHOCEL=13.57; $pdf->ln();$pdf->ln();$pdf->ln(); $pdf->Cell(190,5.5,$A_DATOS[0],1,0,$V_ALIGNCEL,1); $B_ADDPAGE=0;$B_PRO=1;}
        IF ($A_DATOS[0]=='COMPRA') { $pdf->ln();$pdf->ln();$pdf->ln(); $pdf->Cell(190,5.5,$A_DATOS[0],1,0,$V_ALIGNCEL,1); $B_ADDPAGE=0; $B_PRO=0;}
        IF ($A_DATOS[0]=='VENTA')  { $pdf->ln();$pdf->ln();$pdf->ln(); $pdf->Cell(190,5.5,$A_DATOS[0],1,0,$V_ALIGNCEL,1); $B_ADDPAGE=0; $B_PRO=0;}
        IF ($A_DATOS[0]=='*')      { $pdf->SetTextColor(0,0,0);$pdf->ln(); $pdf->Cell(190,5.5,$A_DATOS[1],0,0,'L',0); $B_ADDPAGE=0;$B_PRO=1;}
     }
     ELSE
     {
       $pdf->ln();
       $pdf->SetTextColor(0,0,0);
       $V_NEGRITA='B';
       $V_TAMANO = 6 ;
       FOREACH($A_DATOS AS $V_DATO)
       {
         IF ($V_CONT==1)                      { $V_TAMANO=5; }
         IF ($V_DATO=='TOTAL' AND $B_PRO==1)  { $B_ADDPAGE=1; }
         $pdf->SetFont('Arial',$V_NEGRITA,$V_TAMANO);
         $pdf->Cell($V_ANCHOCEL,2.6,$V_DATO,1,0,$V_ALIGNCEL);
         $V_BAND=1;
         IF ($V_BAND==1 AND $V_CONT==1) { $V_ALIGNCEL='R'; $V_NEGRITA=''; }
         IF ($V_BAND==1 AND $V_REPORTE=='INTERCAMBIO') { $V_ANCHOCEL=12.30; }
       }
       $V_CONT=1;
     }
}
FCLOSE($V_GESTOR);
$pdf->Output();
?>
